home *** CD-ROM | disk | FTP | other *** search
/ Programmer Power Tools / Programmer Power Tools.iso / pcmag / vol7n20.arc / BAT_CASE.BAT next >
Encoding:
DOS Batch File  |  1988-08-22  |  601 b   |  36 lines
  1. ECHO OFF
  2. CLS
  3. :CASE0
  4. ECHO WHAT would you like to do now?
  5. ECHO    (S) Run Spreadsheet
  6. ECHO    (D) Run Database
  7. ECHO    (W) Run Word Processor
  8. ECHO    (Q) Quit
  9. GETKEY
  10. SET opt=0
  11. REM 68=D, 81=Q, 83=S, 87=W, 100=d, 113=q, 115=s, 119=w
  12. FOR %%e IN (68 81 83 87 100 113 115 119) DO IF ERRORLEVEL=%%e SET opt=%%e
  13. GOTO CASE%opt%
  14.  
  15. :CASE115
  16. :CASE83
  17. ECHO Pretending to run Spreadsheet
  18. PAUSE
  19. GOTO CASE0
  20.  
  21. :CASE68
  22. :CASE100
  23. ECHO Pretending to run Database
  24. PAUSE
  25. GOTO CASE0
  26.  
  27. :CASE119
  28. :CASE87
  29. ECHO Pretending to run Word Processor
  30. Pause
  31. GOTO CASE0
  32.  
  33. :CASE113
  34. :CASE81
  35. ECHO ENDING it all
  36.